object KsFontPanel: TTeFontPanel
  Left = 0
  Top = 0
  Width = 352
  Height = 331
  TabOrder = 0
  object FontLabel: TTeLabel
    Left = 6
    Top = 8
    Width = 24
    Height = 13
    Caption = 'Font:'
    Color = clBtnFace
    ParentColor = False
  end
  object FontStyleLabel: TTeLabel
    Left = 158
    Top = 8
    Width = 48
    Height = 13
    Caption = 'Font style:'
    Color = clBtnFace
    ParentColor = False
  end
  object FontSizeLabel: TTeLabel
    Left = 276
    Top = 8
    Width = 23
    Height = 13
    Caption = 'Size:'
    Color = clBtnFace
    ParentColor = False
  end
  object FontScriptLabel: TTeLabel
    Left = 158
    Top = 246
    Width = 30
    Height = 13
    Caption = 'Script:'
    Color = clBtnFace
    ParentColor = False
  end
  object teFontName: TTeSEdit
    Left = 6
    Top = 24
    Width = 145
    Height = 21
    TabOrder = 0
    ThemeObject = 'default'
  end
  object teFontList: TTeListBox
    Left = 6
    Top = 48
    Width = 145
    Height = 112
    Performance = kspDoubleBuffer
    OnClick = teFontListClick
    AllowGrayed = False
    AlwaysShowScrlBar = False
    BevelSides = [kbsLeft, kbsTop, kbsRight, kbsBottom]
    BevelInner = kbvLowered
    BevelOuter = kbvLowered
    BevelKind = kbkSingle
    BevelWidth = 1
    BorderWidth = 0
    Columns = 0
    Flat = True
    ItemHeight = 18
    Sorted = True
    ListStyle = lbFonts
    ThemeObject = 'default'
    TabOrder = 1
  end
  object teFontStyle: TTeSEdit
    Left = 158
    Top = 24
    Width = 111
    Height = 21
    TabOrder = 2
    ThemeObject = 'default'
  end
  object teStyleList: TTeListBox
    Left = 158
    Top = 48
    Width = 111
    Height = 112
    Performance = kspDoubleBuffer
    OnClick = teStyleListClick
    AllowGrayed = False
    AlwaysShowScrlBar = False
    BevelSides = [kbsLeft, kbsTop, kbsRight, kbsBottom]
    BevelInner = kbvLowered
    BevelOuter = kbvLowered
    BevelKind = kbkSingle
    BevelWidth = 1
    BorderWidth = 0
    Columns = 0
    Flat = True
    Items.Strings = (
      'Regular'
      'Italic'
      'Bold'
      'Bold Italic')
    ItemHeight = 18
    ThemeObject = 'default'
    TabOrder = 3
  end
  object teFontSize: TTeSEdit
    Left = 276
    Top = 24
    Width = 51
    Height = 21
    TabOrder = 4
    ThemeObject = 'default'
  end
  object teSizeList: TTeListBox
    Left = 276
    Top = 48
    Width = 49
    Height = 112
    Performance = kspDoubleBuffer
    OnClick = teSizeListClick
    AllowGrayed = False
    AlwaysShowScrlBar = False
    BevelSides = [kbsLeft, kbsTop, kbsRight, kbsBottom]
    BevelInner = kbvLowered
    BevelOuter = kbvLowered
    BevelKind = kbkSingle
    BevelWidth = 1
    BorderWidth = 0
    Columns = 0
    Flat = True
    Items.Strings = (
      '4'
      '6'
      '8'
      '10'
      '12'
      '14'
      '16'
      '18'
      '20'
      '22'
      '24')
    ItemHeight = 18
    ThemeObject = 'default'
    TabOrder = 5
  end
  object teEffectGroup: TTeGroupBox
    Left = 6
    Top = 166
    Width = 147
    Height = 123
    Visible = False
    CaptionMargin = 12
    Caption = 'Effects'
    CheckBoxAlignment = kalLeftJustify
    ThemeObject = 'default'
    Transparent = True
    TabOrder = 6
    UseCheckBox = False
    object FontColorLabel: TTeLabel
      Left = 10
      Top = 70
      Width = 27
      Height = 13
      Caption = 'Color:'
      Color = clBtnFace
      ParentColor = False
    end
    object teStrikeout: TTeCheckBox
      Left = 10
      Top = 20
      Width = 127
      Height = 20
      Performance = kspDoubleBuffer
      OnClick = teStrikeoutClick
      Caption = 'Strikeout'
      AllowGrayed = False
      Alignment = kalLeftJustify
      Checked = False
      Spacing = 5
      State = kcbsUnChecked
      ThemeObject = 'default'
      TabOrder = 0
      Transparent = True
      WordWrap = False
    end
    object teUnderline: TTeCheckBox
      Left = 10
      Top = 44
      Width = 125
      Height = 20
      Performance = kspDoubleBuffer
      OnClick = teUnderlineClick
      Caption = 'teUnderline'
      AllowGrayed = False
      Alignment = kalLeftJustify
      Checked = False
      Spacing = 5
      State = kcbsUnChecked
      ThemeObject = 'default'
      TabOrder = 1
      Transparent = True
      WordWrap = False
    end
    object teFontColor: TTeComboBox
      Left = 10
      Top = 86
      Width = 125
      Height = 23
      Cursor = crIBeam
      Performance = kspDoubleBuffer
      BevelWidth = 1
      BorderWidth = 3
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 2
      OnChange = teFontColorChange
      AutoComplete = False
      ComboStyle = kcsDropDownList
      ItemHeight = 18
      ListStyle = lbColorNames
    end
  end
  object FontSample: TTeGroupBox
    Left = 156
    Top = 166
    Width = 173
    Height = 77
    CaptionMargin = 12
    Caption = 'Sample'
    CheckBoxAlignment = kalLeftJustify
    ThemeObject = 'default'
    Transparent = True
    TabOrder = 7
    UseCheckBox = False
    object teSamplePanel: TTePanel
      Left = 12
      Top = 20
      Width = 149
      Height = 45
      BorderWidth = 2
      TabOrder = 0
      ThemeObject = 'default'
      object tePreviewPaint: TTePaintBox
        Left = 3
        Top = 3
        Width = 143
        Height = 39
        Align = alClient
        Color = clBtnFace
        ParentColor = False
        OnPaint = tePreviewPaintPaint
      end
    end
  end
  object teScript: TTeComboBox
    Left = 158
    Top = 264
    Width = 169
    Height = 23
    Cursor = crIBeam
    Performance = kspDoubleBuffer
    BevelWidth = 1
    BorderWidth = 3
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    ReadOnly = True
    TabOrder = 8
    OnChange = teScriptChange
    AutoComplete = False
    ComboStyle = kcsDropDownList
  end
end